home *** CD-ROM | disk | FTP | other *** search
/ The Pacifier Press Kit / The Pacifier Press Kit.iso / pc / Program.dxr / Internal_56_End Selction Behavior.ls < prev    next >
Encoding:
Text File  |  2005-02-15  |  2.5 KB  |  96 lines
  1. property pMemberNormal, pMemberRollover, gowhere, soundMember, soundChannel, loops, pCursorChange, pCursorChoice, pSpriteMember, pAddNumber
  2. global gPhotolist
  3.  
  4. on getBehaviorDescription me
  5.   return "Rollover, Sound and  goto Marker" & RETURN & RETURN & "Just add to Sprite and fill-in Properties"
  6. end
  7.  
  8. on getBehaviorTooltip me
  9.   return "Use with any sprite member."
  10. end
  11.  
  12. on getPropertyDescriptionList me
  13.   xlist = [:]
  14.   addProp(xlist, #gowhere, [#comment: "Navigate Where:", #format: #marker, #default: #bitmap])
  15.   addProp(xlist, #soundMember, [#comment: "Sound to play", #format: #sound, #default: VOID])
  16.   addProp(xlist, #soundChannel, [#comment: "Sound channel", #format: #integer, #default: 3, #range: [2, 3, 4]])
  17.   addProp(xlist, #loops, [#comment: "How many loops:", #format: #integer, #default: 1, #range: [1, 2, 3, 4, 5, 6, 7, 8]])
  18.   addProp(xlist, #pCursorChoice, [#default: 1, #format: #boolean, #comment: "Do you want a cursor change"])
  19.   addProp(xlist, #pCursorChange, [#format: #cursor, #comment: "Please choose cursor", #default: 280])
  20.   addProp(xlist, #pSpriteMember, [#comment: "Type in which sprite number will roll:", #format: #integer, #default: VOID])
  21.   addProp(xlist, #pAddNumber, [#comment: "Type in which variable:", #format: #string, #default: VOID])
  22.   return xlist
  23. end
  24.  
  25. on spriteRoll
  26.   rollSprite = pSpriteMember
  27.   if rollSprite > 0 then
  28.     sprite(rollSprite).memberNum = sprite(rollSprite).memberNum + 1
  29.   else
  30.     nothing()
  31.   end if
  32. end
  33.  
  34. on spriteLeave
  35.   unrollSprite = pSpriteMember
  36.   if unrollSprite > 0 then
  37.     sprite(unrollSprite).memberNum = sprite(unrollSprite).memberNum - 1
  38.   else
  39.     nothing()
  40.   end if
  41. end
  42.  
  43. on changeCur
  44.   if pCursorChoice = 1 then
  45.     cursor(pCursorChange)
  46.   else
  47.     cursor(0)
  48.   end if
  49. end
  50.  
  51. on choosePic
  52.   gPhotolist.add(pAddNumber)
  53. end
  54.  
  55. on playMySound me
  56.   soundStatus = sound(soundChannel)
  57.   if soundStatus = 4 then
  58.     sound(soundChannel).play()
  59.   else
  60.     sound(soundChannel).play([#member: soundMember, #loopCount: loops])
  61.   end if
  62. end
  63.  
  64. on mouseUp me
  65.   playMySound()
  66.   endSaves()
  67.   cursor(0)
  68. end
  69.  
  70. on mouseEnter me
  71.   changeCur()
  72. end
  73.  
  74. on endSaves
  75.   if gPhotolist.getPos(pAddNumber) > 0 then
  76.     gPhotolist.deleteOne(pAddNumber)
  77.     sprite(pSpriteMember).member = member("End_Save")
  78.   else
  79.     gPhotolist.add(pAddNumber)
  80.     sprite(pSpriteMember).member = member("End_SaveIndicator")
  81.   end if
  82.   updateStage()
  83. end
  84.  
  85. on mouseLeave
  86.   cursor(0)
  87. end
  88.  
  89. on enterFrame me
  90.   if gPhotolist.getPos(pAddNumber) > 0 then
  91.     sprite(pSpriteMember).member = member("End_SaveIndicator")
  92.   else
  93.     sprite(pSpriteMember).member = member("End_Save")
  94.   end if
  95. end
  96.